home *** CD-ROM | disk | FTP | other *** search
- #define Push(z) \
- MOVE.B z,(rSTACK,rSP.w) \
- SUBQ.W #1,rSP \
- ANDI.W #0x00FF,rSP
-
- #define Pop(z) \
- ADDQ #1,rSP \
- ANDI.W #0x00FF,rSP \
- MOVE.B (rSTACK,rSP.w),z
-
- #define PushWord(z) \
- MOVE.W z,D0 \
- LSR.W #8,D0 \
- Push(D0) \
- Push(z)
- #define PopWord(z) \
- CLR.W z \
- Pop(z) \
- Pop(D0) \
- LSL.W #8,D0 \
- OR.W D0,z
-
- /*#define PushWord(z) Push((z>>8)&255); Push(z&255)*/
- /*#define PopWord(z) z=Pop(); z +=(word)256*Pop()*/
-